home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 007 / cstdio.arc / SRC.ARC / FNSCHR.C < prev    next >
Encoding:
Text File  |  1985-04-01  |  1.1 KB  |  84 lines
  1. /*    fnschr.c - character functions.
  2.     (C) Copyright 1984 Gregory R. Mansfield - All Rights Reserved.
  3.     G. R. Mansfield.  84/06/10.
  4.     Ver 1.0-5401.
  5. */
  6.  
  7. int isalpha(c)
  8. char c;
  9. {
  10.     return(c >= 'a' && c <= 'z' || c >= 'A' && c <= 'Z');
  11. }
  12.  
  13. int isascii(c)
  14. char c;
  15. {
  16.     return(c < 0x80);
  17. }
  18.  
  19. int iscntl(c)
  20. char c;
  21. {
  22.     return(c < 0x20 || c == 0x7F);
  23. }
  24.  
  25. int isdigit(c)
  26. char c;
  27. {
  28.     return(c >= '0' && c <= '9');
  29. }
  30.  
  31. int islower(c)
  32. char c;
  33. {
  34.     return(c >= 'a' && c <= 'z');
  35. }
  36.  
  37. int isspace(c)
  38. char c;
  39. {
  40.     return(c == ' ' || c == '\r' || c == '\n');
  41. }
  42.  
  43. int isupper(c)
  44. char c;
  45. {
  46.     return(c >= 'A' && c <= 'Z');
  47. }
  48.  
  49. int isalnum(c)
  50. char c;
  51. {
  52.     return(isalpha(c) || isdigit(c));
  53. }
  54.  
  55. int isprint(c)
  56. char c;
  57. {
  58.     return(c < 0x80 && !iscntl(c));
  59. }
  60.  
  61. int ispunct(c)
  62. char c;
  63. {
  64.     return(c < 0x80 && !isalnum(c) && ! iscntl(c));
  65. }
  66.  
  67. int isxdigit(c)
  68. char c;
  69. {
  70.     return(isdigit(c) || (c >= 'A' && c <= 'F') || (c >= 'a' && c <= 'f'));
  71. }
  72.  
  73. char toupper(c)
  74. char c;
  75. {
  76.     return(islower(c) ? c - 32 : c);
  77. }
  78.  
  79. char tolower(c)
  80. char c;
  81. {
  82.     return(isupper(c) ? c + 32 : c);
  83. }
  84.